<%
'****************************************************************************************
'**  Copyright Notice    
'**
'**  IRL - Indochina Research Co.,Ltd
'**  http://www.indochinaresearch.com
'**                                                              
'**  Copyright 2007 IRL All Rights Reserved.
'**  
'**
'****************************************************************************************
'**  Module description
'**  This module is use only for the purpose of decoration of web layout rendering
'****************************************************************************************


' Function:	altRow
' Purpose:	Make the background color alternative between white, and #efefef
' Input:	r	- row number
' Apply To:	Table cell <td>
Function altRow(ByVal r)
	If (r MOD 2)=0 Then
		altRow = " bgcolor=""#ffffff"" "
	Else
		altRow = " bgcolor=""#efefef"" "
	End if
End function


' Function:	i_If
' Purpose:	Simulate IIf function of VBA
' Input:	cond	- condition
' 			t_our	- true output
' 			f_out	- false output
' Apply To:	Text (All)
Function i_If(ByVal cond, ByVal t_out, ByVal f_out)
	If cond Then
		i_If = t_out
	Else
		i_If = f_out
	End if
End Function
%>